home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hunter 2006
/
Hunter 2006.iso
/
soft
/
sleipnir241.exe
/
{app}
/
scripts
/
ƒ†[ƒeƒBƒŠƒeƒB
/
‹§“I‚ɕ‚¶‚é.vbs
< prev
next >
Wrap
Text File
|
2006-06-15
|
552b
|
20 lines
'==========================================================
'Script jin-ren
' ï¡ÉºôIé╔ò┬é╢éΘ
' âiârâQü[âgâìâbâNé≡é╡é─éóé─éαï¡ÉºôIé╔ë≡Å£é╡é─ò┬é╢é▄é╖üB
' òüÆié═ò┬é╢é╚éóüAé┼éαêΩÄ₧ôIé╔ï¡ÉºôIé╔ò┬é╢é╜éóÄ₧é╚é╟é╔ò╓ùÿé┼é╖üB
'
' 2002/09/08
'==========================================================
Option Explicit
Dim obj, document, id
Set obj = CreateObject("Sleipnir.API")
id = obj.GetDocumentID(obj.ActiveIndex)
call obj.SetNavigateLock(id,false)
call obj.Close(id)
Set obj = Nothing